3.6.3 \(\int (b \sec (a+b x))^n (c \sin (a+b x))^{3/2} \, dx\) [503]

Optimal. Leaf size=76 \[ -\frac {c \, _2F_1\left (-\frac {1}{4},\frac {1-n}{2};\frac {3-n}{2};\cos ^2(a+b x)\right ) (b \sec (a+b x))^{-1+n} \sqrt {c \sin (a+b x)}}{(1-n) \sqrt [4]{\sin ^2(a+b x)}} \]

[Out]

-c*hypergeom([-1/4, 1/2-1/2*n],[3/2-1/2*n],cos(b*x+a)^2)*(b*sec(b*x+a))^(-1+n)*(c*sin(b*x+a))^(1/2)/(1-n)/(sin
(b*x+a)^2)^(1/4)

________________________________________________________________________________________

Rubi [A]
time = 0.08, antiderivative size = 76, normalized size of antiderivative = 1.00, number of steps used = 2, number of rules used = 2, integrand size = 23, \(\frac {\text {number of rules}}{\text {integrand size}}\) = 0.087, Rules used = {2667, 2656} \begin {gather*} -\frac {c \sqrt {c \sin (a+b x)} (b \sec (a+b x))^{n-1} \, _2F_1\left (-\frac {1}{4},\frac {1-n}{2};\frac {3-n}{2};\cos ^2(a+b x)\right )}{(1-n) \sqrt [4]{\sin ^2(a+b x)}} \end {gather*}

Antiderivative was successfully verified.

[In]

Int[(b*Sec[a + b*x])^n*(c*Sin[a + b*x])^(3/2),x]

[Out]

-((c*Hypergeometric2F1[-1/4, (1 - n)/2, (3 - n)/2, Cos[a + b*x]^2]*(b*Sec[a + b*x])^(-1 + n)*Sqrt[c*Sin[a + b*
x]])/((1 - n)*(Sin[a + b*x]^2)^(1/4)))

Rule 2656

Int[(cos[(e_.) + (f_.)*(x_)]*(a_.))^(m_)*((b_.)*sin[(e_.) + (f_.)*(x_)])^(n_), x_Symbol] :> Simp[(-b^(2*IntPar
t[(n - 1)/2] + 1))*(b*Sin[e + f*x])^(2*FracPart[(n - 1)/2])*((a*Cos[e + f*x])^(m + 1)/(a*f*(m + 1)*(Sin[e + f*
x]^2)^FracPart[(n - 1)/2]))*Hypergeometric2F1[(1 + m)/2, (1 - n)/2, (3 + m)/2, Cos[e + f*x]^2], x] /; FreeQ[{a
, b, e, f, m, n}, x] && SimplerQ[n, m]

Rule 2667

Int[((b_.)*sec[(e_.) + (f_.)*(x_)])^(n_)*((a_.)*sin[(e_.) + (f_.)*(x_)])^(m_), x_Symbol] :> Dist[b^2*(b*Cos[e
+ f*x])^(n - 1)*(b*Sec[e + f*x])^(n - 1), Int[(a*Sin[e + f*x])^m/(b*Cos[e + f*x])^n, x], x] /; FreeQ[{a, b, e,
f, m, n}, x] &&  !IntegerQ[m] &&  !IntegerQ[n]

Rubi steps

\begin {align*} \int (b \sec (a+b x))^n (c \sin (a+b x))^{3/2} \, dx &=\left (b^2 (b \cos (a+b x))^{-1+n} (b \sec (a+b x))^{-1+n}\right ) \int (b \cos (a+b x))^{-n} (c \sin (a+b x))^{3/2} \, dx\\ &=-\frac {c \, _2F_1\left (-\frac {1}{4},\frac {1-n}{2};\frac {3-n}{2};\cos ^2(a+b x)\right ) (b \sec (a+b x))^{-1+n} \sqrt {c \sin (a+b x)}}{(1-n) \sqrt [4]{\sin ^2(a+b x)}}\\ \end {align*}

________________________________________________________________________________________

Mathematica [A]
time = 42.08, size = 104, normalized size = 1.37 \begin {gather*} \frac {2 \cos ^2(a+b x)^{\frac {1}{2} (-1+n)} (b \sec (a+b x))^{-1+n} (c \sin (a+b x))^{5/2} \left (9 \, _2F_1\left (\frac {5}{4},\frac {1}{2} (-1+n);\frac {9}{4};\sin ^2(a+b x)\right )+5 \, _2F_1\left (\frac {9}{4},\frac {1+n}{2};\frac {13}{4};\sin ^2(a+b x)\right ) \sin ^2(a+b x)\right )}{45 c} \end {gather*}

Antiderivative was successfully verified.

[In]

Integrate[(b*Sec[a + b*x])^n*(c*Sin[a + b*x])^(3/2),x]

[Out]

(2*(Cos[a + b*x]^2)^((-1 + n)/2)*(b*Sec[a + b*x])^(-1 + n)*(c*Sin[a + b*x])^(5/2)*(9*Hypergeometric2F1[5/4, (-
1 + n)/2, 9/4, Sin[a + b*x]^2] + 5*Hypergeometric2F1[9/4, (1 + n)/2, 13/4, Sin[a + b*x]^2]*Sin[a + b*x]^2))/(4
5*c)

________________________________________________________________________________________

Maple [F]
time = 0.08, size = 0, normalized size = 0.00 \[\int \left (b \sec \left (b x +a \right )\right )^{n} \left (c \sin \left (b x +a \right )\right )^{\frac {3}{2}}\, dx\]

Verification of antiderivative is not currently implemented for this CAS.

[In]

int((b*sec(b*x+a))^n*(c*sin(b*x+a))^(3/2),x)

[Out]

int((b*sec(b*x+a))^n*(c*sin(b*x+a))^(3/2),x)

________________________________________________________________________________________

Maxima [F]
time = 0.00, size = 0, normalized size = 0.00 \begin {gather*} \text {Failed to integrate} \end {gather*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate((b*sec(b*x+a))^n*(c*sin(b*x+a))^(3/2),x, algorithm="maxima")

[Out]

integrate((c*sin(b*x + a))^(3/2)*(b*sec(b*x + a))^n, x)

________________________________________________________________________________________

Fricas [F]
time = 0.00, size = 0, normalized size = 0.00 \begin {gather*} \text {could not integrate} \end {gather*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate((b*sec(b*x+a))^n*(c*sin(b*x+a))^(3/2),x, algorithm="fricas")

[Out]

integral(sqrt(c*sin(b*x + a))*(b*sec(b*x + a))^n*c*sin(b*x + a), x)

________________________________________________________________________________________

Sympy [F(-2)]
time = 0.00, size = 0, normalized size = 0.00 \begin {gather*} \text {Exception raised: SystemError} \end {gather*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate((b*sec(b*x+a))**n*(c*sin(b*x+a))**(3/2),x)

[Out]

Exception raised: SystemError >> excessive stack use: stack is 6437 deep

________________________________________________________________________________________

Giac [F]
time = 0.00, size = 0, normalized size = 0.00 \begin {gather*} \text {could not integrate} \end {gather*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

integrate((b*sec(b*x+a))^n*(c*sin(b*x+a))^(3/2),x, algorithm="giac")

[Out]

integrate((c*sin(b*x + a))^(3/2)*(b*sec(b*x + a))^n, x)

________________________________________________________________________________________

Mupad [F]
time = 0.00, size = -1, normalized size = -0.01 \begin {gather*} \int {\left (c\,\sin \left (a+b\,x\right )\right )}^{3/2}\,{\left (\frac {b}{\cos \left (a+b\,x\right )}\right )}^n \,d x \end {gather*}

Verification of antiderivative is not currently implemented for this CAS.

[In]

int((c*sin(a + b*x))^(3/2)*(b/cos(a + b*x))^n,x)

[Out]

int((c*sin(a + b*x))^(3/2)*(b/cos(a + b*x))^n, x)

________________________________________________________________________________________